## Simulate 10,000 random draws from a standard normal dist
std_norm <- rnorm(n = 10e3, mean = 0, sd = 1)
## Print a summary
summary(std_norm) Min. 1st Qu. Median Mean 3rd Qu. Max.
-4.25004 -0.66858 0.01257 0.01746 0.68798 3.79027